inherited FrmFaltososImp: TFrmFaltososImp
  Left = 309
  Top = 143
  Caption = 'Relat'#243'rio de Faltosos'
  ClientHeight = 174
  ClientWidth = 279
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 6
    Top = 102
    Width = 78
    Height = 13
    Caption = 'Modelo de Carta'
  end
  inherited JvFooter1: TJvFooter
    Top = 137
    Width = 279
    inherited btnImprimir: TJvFooterBtn
      Left = 119
      OnClick = btnImprimirClick
    end
    inherited btnFechar: TJvFooterBtn
      Left = 197
    end
  end
  object rgTipoRel: TRadioGroup [2]
    Left = 5
    Top = 0
    Width = 269
    Height = 41
    Caption = 'Tipo de Relat'#243'rio'
    Columns = 2
    Ctl3D = False
    ItemIndex = 0
    Items.Strings = (
      'Anal'#237'tico'
      'Sint'#233'tico')
    ParentCtl3D = False
    TabOrder = 0
  end
  object gbPeriodo: TGroupBox [3]
    Left = 5
    Top = 48
    Width = 269
    Height = 49
    Caption = 'Per'#237'odo'
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    object Label3: TLabel
      Left = 7
      Top = 22
      Width = 17
      Height = 13
      Caption = 'De:'
    end
    object Label2: TLabel
      Left = 135
      Top = 22
      Width = 19
      Height = 13
      Caption = 'Ate:'
    end
    object txtDe: TwwDBDateTimePicker
      Left = 25
      Top = 18
      Width = 105
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 0
      UnboundDataType = wwDTEdtDate
    end
    object txtAte: TwwDBDateTimePicker
      Left = 156
      Top = 18
      Width = 105
      Height = 21
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      ShowButton = True
      TabOrder = 1
      UnboundDataType = wwDTEdtDate
    end
  end
  object txtCodigo: TEditEnh [4]
    Left = 6
    Top = 116
    Width = 95
    Height = 19
    Text = '0'
    Alignment = taRightJustify
    Button.Key1 = 'F12'
    Button.Style = eebEllipsis
    OnButton1 = txtCodigoButton1
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 2
    OnEnter = txtCodigoEnter
    OnExit = txtCodigoExit
    EditMaskEx = '::NM::!9999999990;0;0;0'
  end
  object txtNome: TEditEnh [5]
    Left = 103
    Top = 116
    Width = 171
    Height = 19
    TabStop = False
    ReadOnly = True
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 3
    Color = clBtnFace
  end
  object txtCampos: TMemo [6]
    Left = 152
    Top = 112
    Width = 79
    Height = 17
    Lines.Strings = (
      'DATACURTA-'
      'DATA ATUAL '
      'CURTA'
      'DATALONGA-'
      'DATA ATUAL '
      'LONGA'
      'HORACURTA-'
      'HORA ATUAL '
      'CURTA'
      'HORALONGA-'
      'HORA ATUAL '
      'LONGA'
      'DIAATUAL-'
      'DIA ATUAL '
      'MESATUAL-'
      'M'#202'S ATUAL'
      'ANOATUAL-'
      'ANO ATUAL')
    TabOrder = 4
    Visible = False
  end
  inherited frxReport: TfrxReport
    ReportOptions.LastChange = 40727.511118402780000000
    Datasets = <
      item
        DataSet = DBDataset
        DataSetName = 'DBDataset'
      end>
    Variables = <
      item
        Name = ' Interna'
        Value = Null
      end
      item
        Name = 'Rel_Usuario'
        Value = Null
      end
      item
        Name = 'Rel_Titulo'
        Value = Null
      end
      item
        Name = 'Rel_SubTitulo'
        Value = Null
      end
      item
        Name = 'Rel_Empresa_Nome'
        Value = Null
      end
      item
        Name = 'Rel_Empresa_Imagem'
        Value = Null
      end
      item
        Name = 'Rel_Empresa'
        Value = Null
      end
      item
        Name = 'Rel_ID'
        Value = Null
      end>
    Style = <>
    inherited Relatorio: TfrxReportPage
      inherited Cabecalho: TfrxPageHeader
        inherited Rel_Usuario: TfrxMemoView
          Memo.UTF8 = (
            '[Rel_Usuario]')
        end
        inherited Rel_Data: TfrxMemoView
          Memo.UTF8 = (
            '[<Date>] [<Time>]')
        end
        inherited Rel_Empresa_Nome: TfrxMemoView
          Memo.UTF8 = (
            '[Rel_Empresa_Nome]')
        end
        inherited Pagina: TfrxMemoView
          Memo.UTF8 = (
            'P'#195#129'G.: [PAGE#] de [TOTALPAGES#]')
        end
        object Memo1: TfrxMemoView
          Left = 151.181200000000000000
          Top = 22.677180000000000000
          Width = 453.543600000000000000
          Height = 15.118120000000000000
          ShowHint = False
          StretchMode = smActualHeight
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8 = (
            '[Rel_Titulo]')
          ParentFont = False
        end
      end
      inherited Rodape: TfrxPageFooter
        Top = 215.433210000000000000
        inherited Rel_Empresa: TfrxMemoView
          Memo.UTF8 = (
            '[Rel_Empresa]')
        end
      end
      object MasterData2: TfrxMasterData
        Height = 15.118120000000000000
        Top = 139.842610000000000000
        Width = 718.110700000000000000
        DataSet = DBDataset
        DataSetName = 'DBDataset'
        RowCount = 0
        StartNewPage = True
        Stretched = True
        object Memo2: TfrxMemoView
          Width = 718.110700000000000000
          Height = 15.118120000000000000
          ShowHint = False
          StretchMode = smActualHeight
          Memo.UTF8 = (
            '[DBDataset."TEXTO"]')
        end
      end
    end
  end
  object MemDatas: TClientDataSet [23]
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'Data'
        DataType = ftDate
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 101
    Top = 60
    Data = {
      270000009619E0BD010000001800000001000000000003000000270004446174
      6104000600000000000000}
    object MemDatasData: TDateField
      FieldName = 'Data'
      DisplayFormat = 'dd/mm/yyyyy'
    end
  end
  object Mem: TClientDataSet [24]
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'PessoaCod'
        DataType = ftInteger
      end
      item
        Name = 'PessoaNome'
        DataType = ftString
        Size = 100
      end
      item
        Name = 'PesoInicial'
        DataType = ftFloat
      end
      item
        Name = 'PesoFinal'
        DataType = ftFloat
      end
      item
        Name = 'Diferenca'
        DataType = ftFloat
      end
      item
        Name = 'Texto'
        DataType = ftBlob
      end
      item
        Name = 'Faltas'
        DataType = ftInteger
      end>
    IndexDefs = <
      item
        Name = 'IDX'
        Fields = 'Faltas'
      end>
    IndexName = 'IDX'
    Params = <>
    StoreDefs = True
    Left = 165
    Top = 68
    Data = {
      B50000009619E0BD010000001800000007000000000003000000B50009506573
      736F61436F6404000100000000000A506573736F614E6F6D6501004900000001
      000557494454480200020064000B5065736F496E696369616C08000400000000
      00095065736F46696E616C0800040000000000094469666572656E6361080004
      000000000005546578746F04004B000000010007535542545950450200490007
      0042696E617279000646616C74617304000100000000000000}
    object MemPessoaCod: TIntegerField
      FieldName = 'PessoaCod'
    end
    object MemPessoaNome: TStringField
      FieldName = 'PessoaNome'
      Size = 100
    end
    object MemPesoInicial: TFloatField
      FieldName = 'PesoInicial'
    end
    object MemPesoFinal: TFloatField
      FieldName = 'PesoFinal'
    end
    object MemDiferenca: TFloatField
      FieldName = 'Diferenca'
    end
    object MemTexto: TBlobField
      FieldName = 'Texto'
    end
    object MemFaltas: TIntegerField
      FieldName = 'Faltas'
    end
  end
  object MemCampos: TClientDataSet [25]
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'Descricao'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Nome'
        DataType = ftString
        Size = 30
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 40
    Top = 65
    Data = {
      510000009619E0BD010000001800000002000000000003000000510009446573
      63726963616F0100490000000100055749445448020002003200044E6F6D6501
      00490000000100055749445448020002001E000000}
    object MemCamposDescricao: TStringField
      FieldName = 'Descricao'
      Size = 50
    end
    object MemCamposNome: TStringField
      FieldName = 'Nome'
      Size = 30
    end
  end
  object frxReport2: TfrxReport [26]
    Version = '4.10.3'
    DotMatrixReport = False
    IniFile = '\Software\Fast Reports'
    PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator]
    PreviewOptions.Zoom = 1.000000000000000000
    PrintOptions.Printer = 'Padr'#227'o'
    PrintOptions.PrintOnSheet = 0
    ReportOptions.CreateDate = 38724.844736145800000000
    ReportOptions.LastChange = 40775.795978738420000000
    ScriptLanguage = 'PascalScript'
    ScriptText.Strings = (
      'procedure CabecalhoOnBeforePrint(Sender: TfrxComponent);'
      'begin'
      '  if <Rel_Empresa_Imagem> <> null then begin'
      '    Rel_Empresa_Imagem.Visible := True;'
      '    Rel_Empresa_Nome.Visible := False;'
      
        '    Rel_Empresa_Imagem.Picture.LoadFromFile(<Rel_Empresa_Imagem>' +
        ');'
      '  end else begin'
      '    Rel_Empresa_Imagem.Visible := False;'
      '    Rel_Empresa_Nome.Visible := True;'
      '  end;'
      'end;'
      ''
      'begin'
      ''
      'end.')
    Left = 248
    Top = 400
    Datasets = <
      item
        DataSet = DBDataset
        DataSetName = 'DBDataset'
      end>
    Variables = <
      item
        Name = ' Interna'
        Value = Null
      end
      item
        Name = 'Rel_Usuario'
        Value = Null
      end
      item
        Name = 'Rel_Titulo'
        Value = Null
      end
      item
        Name = 'Rel_SubTitulo'
        Value = Null
      end
      item
        Name = 'Rel_Empresa_Nome'
        Value = Null
      end
      item
        Name = 'Rel_Empresa_Imagem'
        Value = Null
      end
      item
        Name = 'Rel_Empresa'
        Value = Null
      end
      item
        Name = 'Rel_ID'
        Value = Null
      end>
    Style = <>
    object Data: TfrxDataPage
      Height = 1000.000000000000000000
      Width = 1000.000000000000000000
    end
    object Relatorio: TfrxReportPage
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      PaperWidth = 210.000000000000000000
      PaperHeight = 297.000000000000000000
      PaperSize = 9
      LeftMargin = 10.000000000000000000
      RightMargin = 10.000000000000000000
      TopMargin = 10.000000000000000000
      BottomMargin = 10.000000000000000000
      object Cabecalho: TfrxPageHeader
        Height = 76.149660000000000000
        Top = 18.897650000000000000
        Width = 718.110700000000000000
        OnBeforePrint = 'CabecalhoOnBeforePrint'
        object Line2: TfrxLineView
          Width = 718.110700000000000000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
        object Line3: TfrxLineView
          Top = 60.472480000000000000
          Width = 718.110236220000000000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
        object Line6: TfrxLineView
          Left = 151.181200000000000000
          Height = 60.472480000000000000
          ShowHint = False
          Diagonal = True
        end
        object Rel_Usuario: TfrxMemoView
          Left = 608.504330000000000000
          Top = 3.779530000000000000
          Width = 105.826840000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8 = (
            '[Rel_Usuario]')
        end
        object Rel_Data: TfrxMemoView
          Left = 608.504330000000000000
          Top = 22.677180000000000000
          Width = 105.826840000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8 = (
            '[<Date>] [<Time>]')
        end
        object Line5: TfrxLineView
          Left = 604.724800000000000000
          Height = 60.472480000000000000
          ShowHint = False
          Diagonal = True
        end
        object Rel_Empresa_Imagem: TfrxPictureView
          Top = 3.779530000000000000
          Width = 147.401670000000000000
          Height = 52.913420000000000000
          ShowHint = False
          Center = True
          Stretched = False
          HightQuality = False
          Transparent = False
          TransparentColor = clWhite
        end
        object Rel_Empresa_Nome: TfrxMemoView
          Left = 3.779530000000000000
          Top = 3.779530000000000000
          Width = 143.622140000000000000
          Height = 52.913420000000000000
          Visible = False
          ShowHint = False
          HAlign = haCenter
          Memo.UTF8 = (
            '[Rel_Empresa_Nome]')
          VAlign = vaCenter
        end
        object Pagina: TfrxMemoView
          Left = 608.504330000000000000
          Top = 41.574830000000000000
          Width = 105.826840000000000000
          Height = 18.897650000000000000
          ShowHint = False
          Memo.UTF8 = (
            'P'#195#129'G.: [PAGE#] de [TOTALPAGES#]')
        end
        object Memo1: TfrxMemoView
          Left = 154.960730000000000000
          Top = 11.338590000000000000
          Width = 445.984540000000000000
          Height = 15.118120000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8 = (
            'RELAT'#195#8220'RIO DE FALTOSOS - SINT'#195#8240'TICO')
          ParentFont = False
        end
        object Memo2: TfrxMemoView
          Left = 154.960730000000000000
          Top = 37.795300000000000000
          Width = 445.984540000000000000
          Height = 15.118120000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8 = (
            '[Rel_SubTitulo]')
          ParentFont = False
        end
        object Line4: TfrxLineView
          Left = -3.779530000000000000
          Top = 76.149660000000000000
          Width = 718.110236220000000000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
        object Memo3: TfrxMemoView
          Top = 61.472480000000000000
          Width = 638.740570000000000000
          Height = 15.118120000000000000
          ShowHint = False
          Memo.UTF8 = (
            'PESSOA')
        end
        object Memo4: TfrxMemoView
          Left = 638.740570000000000000
          Top = 60.472480000000000000
          Width = 79.370130000000000000
          Height = 15.118120000000000000
          ShowHint = False
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = []
          HAlign = haRight
          Memo.UTF8 = (
            'FALTAS')
          ParentFont = False
        end
      end
      object Rodape: TfrxPageFooter
        Height = 18.897650000000000000
        Top = 230.551330000000000000
        Width = 718.110700000000000000
        object Line1: TfrxLineView
          Width = 718.110236220000000000
          ShowHint = False
          Frame.Typ = [ftTop]
        end
        object Rel_Empresa: TfrxMemoView
          Align = baLeft
          Width = 714.331170000000000000
          Height = 18.897650000000000000
          ShowHint = False
          AutoWidth = True
          Memo.UTF8 = (
            '[Rel_Empresa]')
        end
      end
      object MasterData1: TfrxMasterData
        Height = 15.118120000000000000
        Top = 154.960730000000000000
        Width = 718.110700000000000000
        DataSet = DBDataset
        DataSetName = 'DBDataset'
        RowCount = 0
        object Memo7: TfrxMemoView
          Width = 638.740570000000000000
          Height = 15.118120000000000000
          ShowHint = False
          Memo.UTF8 = (
            '[DBDataset."PessoaCod"] - [DBDataset."PessoaNome"]')
        end
        object Memo10: TfrxMemoView
          Left = 638.740570000000000000
          Width = 79.370130000000000000
          Height = 15.118120000000000000
          ShowHint = False
          DisplayFormat.FormatStr = '%2.3f'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = []
          HAlign = haRight
          Memo.UTF8 = (
            '[DBDataset."Faltas"]')
          ParentFont = False
        end
      end
    end
  end
  object MemImp: TClientDataSet [27]
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'Texto'
        DataType = ftBlob
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 221
    Top = 64
    Data = {
      3D0000009619E0BD0100000018000000010000000000030000003D0005546578
      746F04004B0000000100075355425459504502004900070042696E6172790000
      00}
    object MemImpTexto: TBlobField
      FieldName = 'Texto'
    end
  end
end
